home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Network Support Library
/
RoseWare - Network Support Library.iso
/
apidev
/
netdmo.exe
/
MOREINFO.FRM
< prev
next >
Wrap
Text File
|
1993-12-10
|
2KB
|
81 lines
Version 1.00
BEGIN Form Moreinfo
AutoRedraw = 0
BackColor = QBColor(1)
BorderStyle = 1
Caption = "More on NetDemo"
ControlBox = -1
Enabled = -1
ForeColor = QBColor(0)
Height = Char(20)
Left = Char(8)
MaxButton = -1
MinButton = -1
MousePointer = 0
Tag = ""
Top = Char(2)
Visible = -1
Width = Char(63)
WindowState = 0
BEGIN PictureBox Picture1
AutoRedraw = -1
BackColor = QBColor(1)
BorderStyle = 1
DragMode = 0
Enabled = -1
ForeColor = QBColor(15)
Height = Char(14)
Left = Char(0)
MousePointer = 0
TabIndex = 0
TabStop = -1
Tag = ""
Top = Char(0)
Visible = -1
Width = Char(61)
END
BEGIN CommandButton OKButon
BackColor = QBColor(7)
Cancel = 0
Caption = " OK "
Default = 0
DragMode = 0
Enabled = -1
Height = Char(3)
Left = Char(23)
MousePointer = 0
TabIndex = 1
TabStop = -1
Tag = ""
Top = Char(14)
Visible = -1
Width = Char(15)
END
END
'$FORM Netdemo
SUB Form_Load ()
Picture1.PRINT "This program is part of the NETWORK SYSTEM CALLS FOR BASIC "
Picture1.PRINT "software package. Its primary purpose is to demonstrate "
Picture1.PRINT "how our system level calls are used with Microsoft's Visual "
Picture1.PRINT "Basic for DOS. It also demonstrates a few of the numerous"
Picture1.PRINT "ways our calls can be used to add network 'smarts' to your "
Picture1.PRINT "Basic applications."
Picture1.PRINT ""
Picture1.PRINT "For more information on WEST VALLEY SOFTWARE COMPANY"
Picture1.PRINT "and NETWORK SYSTEM CALLS FOR BASIC, please call us at"
Picture1.PRINT "(408) 336-WVSC or send a message via Compuserve"
Picture1.PRINT "mail at 75600,3463"
END SUB
SUB Form_Unload (Cancel AS INTEGER)
Netdemo.SHOW
END SUB
SUB OKButon_Click ()
UNLOAD moreinfo
Netdemo.SHOW
END SUB